﻿Imports System.Data
Imports System.Data.Odbc
Imports WSEntidades
Public Class TimbresemiFact
    Public Shared Function Build(ByVal dr As OdbcDataReader) As TimbresemiBE
        Dim tmpTimbresemi As TimbresemiBE = New TimbresemiBE()
        Try
            With tmpTimbresemi
                .FechaTim = convertDTFromDb.convertDateTime(dr.Item("FechaTim"))
                .IdFact = convertDTFromDb.convertInt32(dr.Item("IdFact"))
                .UUID = convertDTFromDb.ConvertString(dr.Item("UUID"))
            End With
            Return tmpTimbresemi
        Catch ex As Exception
            Throw
        Finally
            tmpTimbresemi = Nothing
        End Try
    End Function
End Class
